<?php
/**
  * Box type par defaut: utilisez ces fichiers pour creer vos propres types de box.
  * Interface d'administration pour regler les parametres du box.
  * Developpe par Rodrigue LE GALL
  *
  * Les variables $env, $box et $param sont disponibles et representent l'environnement, le box et les parametres du box.
  * La variable $modif est reservee.
  */
    if($action=='process'){
        
        /**
          * Le code de votre  box se trouve apres
          */
		$param->set('titre',$titre);
		$L_items = $box->getItems();
		$L_itemSize = $box->getListSize();
		for ($i=0 ; $i < $L_itemSize ; $i++) {
			$L_currentItem = "cb_".$L_items[$i]["name"];
			if (isset($$L_currentItem)) {
				$L_isUsed = true;
			} else {
				$L_isUsed = false;
			}
			$box->setUsed($i, $L_isUsed);
		}
		
        /**
          * Fin de votre Code
          */
        $box->setparam($param);
        $env->setbox($argid,$box);
        $modif = "Administration du box ".$box->getnom().".\n" . $modif;
        $query="UPDATE environnement SET environnement='".$env->serialize()."',lastmod=NOW(),modification='".addslashes($modif)."' WHERE id='$envid'";
        @rportalrequete($query) or die ("ERREUR: $query<br />");	
        header("Location: ?op=admenvmod&argid=$envid");
        exit;
    }
    
    require_once('module/TPLN/TPLN.php');
    $TPLN = new TPLN;
	$L_base_env = get_env_path();
    $TPLN->Open(get_path_box($box->gettypenom()).'admin.html');
    $TPLN->IncludeFile("header",$L_base_env.$session['environnement']."/header.php");
    $TPLN->IncludeFile("footer",$L_base_env.$session['environnement']."/footer.php");
    $TPLN->Parse("box_nom",$box->getnom());
    $TPLN->Parse("type_nom",$box->gettypenom());
    $TPLN->Parse("type_description",nl2br($box->gettypedescription()));
    $TPLN->Parse("type_dir",$box->getrepertoire());
    $TPLN->Parse("boxid",$box->getid());
    $TPLN->Parse("envid",$envid);
    /**
      * Le code de votre  box se trouve apres
      */
	$TPLN->Parse("titre",$param->get('titre'));
	$L_items = $box->getItems();
	$L_itemSize = $box->getListSize();
	$L_bloc = "user_items";
	if (0 == $L_itemSize) {
		$TPLN->EraseBloc($L_bloc);
	}
	for ($i=0 ; $i < $L_itemSize ; $i++) {
		$L_checked = "";
		$TPLN->Parse($L_bloc.".item_value", $i);
		$TPLN->Parse($L_bloc.".item_name", $L_items[$i]["name"]);
		if ($L_items[$i]["used"]) {
			$L_checked = "checked";
		}
		$TPLN->Parse($L_bloc.".item_checked", $L_checked);
		$TPLN->Loop($L_bloc);
	}
    /**
      * Fin de votre Code
      */
    $TPLN->Write();
    exit;
?>
